home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
FM Towns: Software Contest 3
/
FM Towns Software Contest 3.iso
/
gear
/
for_cd
/
meeko
/
read.txt
< prev
next >
Wrap
Text File
|
1994-01-07
|
267b
|
13 lines
A$=GETS$("SYSTEXT",1)
GEAR LOAD "多色フレーム","b:\"+A$+".tif"
DSP SHOW "多色フレーム"
CLRF "HP"
CLRF "L"
CLRF "怪物"
CLRF "アト"
PUTS "アト",GETS$("SYSTEXT",5),1
PUTS "HP",GETS$("SYSTEXT",2),1
PUTS "L",GETS$("SYSTEXT",3),1
PUTS "怪物",STR$(30),1
GO "音楽1"